home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / E / ExerciseAwayYourCalories.cpt / EAYC! / background_2775.txt < prev    next >
Text File  |  1989-03-02  |  10KB  |  468 lines
  1. -- background: 2775 from stack: in
  2. -- bmap block id: 3121
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=0 top=15 right=49 bottom=512
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: 
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   play "Harpsichord"tempo 800"Cq E G Cq E G Cq E G Cq E G Cq E G"
  23. end mouseUp
  24.  
  25.  
  26.  
  27. -- part 2 (field)
  28. -- low flags: 00
  29. -- high flags: 4002
  30. -- rect: left=100 top=81 right=337 bottom=246
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 0
  34. -- font id: 3
  35. -- text size: 9
  36. -- style flags: 0
  37. -- line height: 12
  38. -- part name: 
  39.  
  40.  
  41. -- part 4 (field)
  42. -- low flags: 00
  43. -- high flags: 4002
  44. -- rect: left=248 top=81 right=337 bottom=278
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 65535
  48. -- font id: 3
  49. -- text size: 9
  50. -- style flags: 0
  51. -- line height: 12
  52. -- part name: calories
  53.  
  54.  
  55. -- part 6 (field)
  56. -- low flags: 01
  57. -- high flags: 0002
  58. -- rect: left=87 top=81 right=337 bottom=99
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 0
  62. -- font id: 3
  63. -- text size: 12
  64. -- style flags: 256
  65. -- line height: 12
  66. -- part name: select
  67. ----- HyperTalk script -----
  68. on mouseup
  69.   global calories
  70.   set lockscreen to true
  71.   put empty into field "select"
  72.   set locktext of field "select" to false
  73.   click at the clickloc
  74.   type "‚Ä¢"
  75.   set locktext of field "select" to true
  76.   set lockscreen to false
  77.   repeat with x=1 to number of lines in field select
  78.     if line x of field select="‚Ä¢" then
  79.       put line x of field "calories" into calories
  80.     end if
  81.   end repeat
  82.   repeat with x=4 to 26
  83.     put round((calories/(the short name of field x))*600)*0.1 into field x
  84.   end repeat
  85. end mouseup
  86.  
  87.  
  88. -- part 7 (button)
  89. -- low flags: 00
  90. -- high flags: 2000
  91. -- rect: left=462 top=306 right=336 bottom=498
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 21700 / 21700
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: Quit
  100. ----- HyperTalk script -----
  101. on mouseUp
  102.   answer "Quit to where?" with "Home" or "Finder" or "Cancel"
  103.   if it="Home" then go home
  104.   if it="Finder" then domenu "Quit HyperCard"
  105. end mouseUp
  106.  
  107.  
  108.  
  109. -- part 8 (field)
  110. -- low flags: 00
  111. -- high flags: 0002
  112. -- rect: left=310 top=120 right=134 bottom=337
  113. -- title width / last selected line: 0
  114. -- icon id / first selected line: 0 / 0
  115. -- text alignment: 0
  116. -- font id: 3
  117. -- text size: 9
  118. -- style flags: 0
  119. -- line height: 12
  120. -- part name: 228
  121.  
  122.  
  123. -- part 9 (field)
  124. -- low flags: 00
  125. -- high flags: 0002
  126. -- rect: left=364 top=120 right=134 bottom=391
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 0 / 0
  129. -- text alignment: 0
  130. -- font id: 3
  131. -- text size: 9
  132. -- style flags: 0
  133. -- line height: 12
  134. -- part name: 396
  135.  
  136.  
  137. -- part 10 (field)
  138. -- low flags: 00
  139. -- high flags: 0002
  140. -- rect: left=337 top=153 right=167 bottom=364
  141. -- title width / last selected line: 0
  142. -- icon id / first selected line: 0 / 0
  143. -- text alignment: 0
  144. -- font id: 3
  145. -- text size: 9
  146. -- style flags: 0
  147. -- line height: 12
  148. -- part name: 486
  149.  
  150.  
  151. -- part 11 (field)
  152. -- low flags: 00
  153. -- high flags: 0002
  154. -- rect: left=416 top=120 right=134 bottom=443
  155. -- title width / last selected line: 0
  156. -- icon id / first selected line: 0 / 0
  157. -- text alignment: 0
  158. -- font id: 3
  159. -- text size: 9
  160. -- style flags: 0
  161. -- line height: 12
  162. -- part name: 798
  163.  
  164.  
  165. -- part 12 (field)
  166. -- low flags: 00
  167. -- high flags: 0002
  168. -- rect: left=390 top=153 right=167 bottom=417
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 0
  172. -- font id: 3
  173. -- text size: 9
  174. -- style flags: 0
  175. -- line height: 12
  176. -- part name: 348
  177.  
  178.  
  179. -- part 13 (field)
  180. -- low flags: 00
  181. -- high flags: 0002
  182. -- rect: left=471 top=120 right=134 bottom=498
  183. -- title width / last selected line: 0
  184. -- icon id / first selected line: 0 / 0
  185. -- text alignment: 0
  186. -- font id: 3
  187. -- text size: 9
  188. -- style flags: 0
  189. -- line height: 12
  190. -- part name: 252
  191.  
  192.  
  193. -- part 14 (field)
  194. -- low flags: 00
  195. -- high flags: 0002
  196. -- rect: left=444 top=153 right=167 bottom=471
  197. -- title width / last selected line: 0
  198. -- icon id / first selected line: 0 / 0
  199. -- text alignment: 0
  200. -- font id: 3
  201. -- text size: 9
  202. -- style flags: 0
  203. -- line height: 12
  204. -- part name: 444
  205.  
  206.  
  207. -- part 15 (field)
  208. -- low flags: 00
  209. -- high flags: 0002
  210. -- rect: left=310 top=188 right=202 bottom=337
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 0 / 0
  213. -- text alignment: 0
  214. -- font id: 3
  215. -- text size: 9
  216. -- style flags: 0
  217. -- line height: 12
  218. -- part name: 381
  219.  
  220.  
  221. -- part 16 (field)
  222. -- low flags: 00
  223. -- high flags: 0002
  224. -- rect: left=364 top=188 right=202 bottom=391
  225. -- title width / last selected line: 0
  226. -- icon id / first selected line: 0 / 0
  227. -- text alignment: 0
  228. -- font id: 3
  229. -- text size: 9
  230. -- style flags: 0
  231. -- line height: 12
  232. -- part name: 792
  233.  
  234.  
  235. -- part 17 (field)
  236. -- low flags: 00
  237. -- high flags: 0002
  238. -- rect: left=417 top=188 right=202 bottom=444
  239. -- title width / last selected line: 0
  240. -- icon id / first selected line: 0 / 0
  241. -- text alignment: 0
  242. -- font id: 3
  243. -- text size: 9
  244. -- style flags: 0
  245. -- line height: 12
  246. -- part name: 450
  247.  
  248.  
  249. -- part 18 (field)
  250. -- low flags: 00
  251. -- high flags: 0002
  252. -- rect: left=473 top=188 right=202 bottom=500
  253. -- title width / last selected line: 0
  254. -- icon id / first selected line: 0 / 0
  255. -- text alignment: 0
  256. -- font id: 3
  257. -- text size: 9
  258. -- style flags: 0
  259. -- line height: 12
  260. -- part name: 582
  261.  
  262.  
  263. -- part 19 (field)
  264. -- low flags: 00
  265. -- high flags: 0002
  266. -- rect: left=336 top=221 right=235 bottom=363
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 0 / 0
  269. -- text alignment: 0
  270. -- font id: 3
  271. -- text size: 9
  272. -- style flags: 0
  273. -- line height: 12
  274. -- part name: 264
  275.  
  276.  
  277. -- part 20 (field)
  278. -- low flags: 00
  279. -- high flags: 0002
  280. -- rect: left=391 top=221 right=235 bottom=418
  281. -- title width / last selected line: 0
  282. -- icon id / first selected line: 0 / 0
  283. -- text alignment: 0
  284. -- font id: 3
  285. -- text size: 9
  286. -- style flags: 0
  287. -- line height: 12
  288. -- part name: 102
  289.  
  290.  
  291. -- part 21 (field)
  292. -- low flags: 00
  293. -- high flags: 0002
  294. -- rect: left=445 top=221 right=235 bottom=472
  295. -- title width / last selected line: 0
  296. -- icon id / first selected line: 0 / 0
  297. -- text alignment: 0
  298. -- font id: 3
  299. -- text size: 9
  300. -- style flags: 0
  301. -- line height: 12
  302. -- part name: 204
  303.  
  304.  
  305. -- part 22 (field)
  306. -- low flags: 00
  307. -- high flags: 0002
  308. -- rect: left=309 top=254 right=268 bottom=336
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 0 / 0
  311. -- text alignment: 0
  312. -- font id: 3
  313. -- text size: 9
  314. -- style flags: 0
  315. -- line height: 12
  316. -- part name: 564
  317.  
  318.  
  319. -- part 23 (field)
  320. -- low flags: 00
  321. -- high flags: 0002
  322. -- rect: left=419 top=254 right=268 bottom=446
  323. -- title width / last selected line: 0
  324. -- icon id / first selected line: 0 / 0
  325. -- text alignment: 0
  326. -- font id: 3
  327. -- text size: 9
  328. -- style flags: 0
  329. -- line height: 12
  330. -- part name: 396
  331.  
  332.  
  333. -- part 24 (field)
  334. -- low flags: 00
  335. -- high flags: 0002
  336. -- rect: left=363 top=254 right=268 bottom=390
  337. -- title width / last selected line: 0
  338. -- icon id / first selected line: 0 / 0
  339. -- text alignment: 0
  340. -- font id: 3
  341. -- text size: 9
  342. -- style flags: 0
  343. -- line height: 12
  344. -- part name: 1212
  345.  
  346.  
  347. -- part 25 (field)
  348. -- low flags: 00
  349. -- high flags: 0002
  350. -- rect: left=472 top=254 right=268 bottom=499
  351. -- title width / last selected line: 0
  352. -- icon id / first selected line: 0 / 0
  353. -- text alignment: 0
  354. -- font id: 3
  355. -- text size: 9
  356. -- style flags: 0
  357. -- line height: 12
  358. -- part name: 864
  359.  
  360.  
  361. -- part 26 (field)
  362. -- low flags: 00
  363. -- high flags: 0002
  364. -- rect: left=336 top=286 right=300 bottom=363
  365. -- title width / last selected line: 0
  366. -- icon id / first selected line: 0 / 0
  367. -- text alignment: 0
  368. -- font id: 3
  369. -- text size: 9
  370. -- style flags: 0
  371. -- line height: 12
  372. -- part name: 276
  373.  
  374.  
  375. -- part 27 (field)
  376. -- low flags: 00
  377. -- high flags: 0002
  378. -- rect: left=391 top=286 right=300 bottom=418
  379. -- title width / last selected line: 0
  380. -- icon id / first selected line: 0 / 0
  381. -- text alignment: 0
  382. -- font id: 3
  383. -- text size: 9
  384. -- style flags: 0
  385. -- line height: 12
  386. -- part name: 174
  387.  
  388.  
  389. -- part 28 (field)
  390. -- low flags: 00
  391. -- high flags: 0002
  392. -- rect: left=445 top=286 right=300 bottom=472
  393. -- title width / last selected line: 0
  394. -- icon id / first selected line: 0 / 0
  395. -- text alignment: 0
  396. -- font id: 3
  397. -- text size: 9
  398. -- style flags: 0
  399. -- line height: 12
  400. -- part name: 270
  401.  
  402.  
  403. -- part 29 (field)
  404. -- low flags: 00
  405. -- high flags: 0002
  406. -- rect: left=310 top=318 right=332 bottom=337
  407. -- title width / last selected line: 0
  408. -- icon id / first selected line: 0 / 0
  409. -- text alignment: 0
  410. -- font id: 3
  411. -- text size: 9
  412. -- style flags: 0
  413. -- line height: 12
  414. -- part name: 540
  415.  
  416.  
  417. -- part 30 (field)
  418. -- low flags: 00
  419. -- high flags: 0002
  420. -- rect: left=363 top=318 right=332 bottom=390
  421. -- title width / last selected line: 0
  422. -- icon id / first selected line: 0 / 0
  423. -- text alignment: 0
  424. -- font id: 3
  425. -- text size: 9
  426. -- style flags: 0
  427. -- line height: 12
  428. -- part name: 180
  429.  
  430.  
  431. -- part 31 (button)
  432. -- low flags: 00
  433. -- high flags: 2000
  434. -- rect: left=424 top=306 right=336 bottom=461
  435. -- title width / last selected line: 0
  436. -- icon id / first selected line: 19678 / 19678
  437. -- text alignment: 1
  438. -- font id: 0
  439. -- text size: 12
  440. -- style flags: 0
  441. -- line height: 16
  442. -- part name: 
  443. ----- HyperTalk script -----
  444. on mouseUp
  445.   go to first card
  446. end mouseUp
  447.  
  448.  
  449.  
  450. -- part 32 (button)
  451. -- low flags: 00
  452. -- high flags: 2000
  453. -- rect: left=10 top=81 right=337 bottom=88
  454. -- title width / last selected line: 0
  455. -- icon id / first selected line: 0 / 0
  456. -- text alignment: 1
  457. -- font id: 0
  458. -- text size: 12
  459. -- style flags: 0
  460. -- line height: 16
  461. -- part name: 
  462. ----- HyperTalk script -----
  463. on mouseUp
  464.   visual effect wipe right
  465.   go next
  466. end mouseUp
  467.  
  468.